ESC sekvence
Otázka od: david@nj.hcv.cz
28. 7. 2004 7:44
No to jde ale ja chci tisknout na usb ne na lpt nebo na sitovou to uz je
jedno....ale kdyz si tak s tim hraju tak se mi porad vyhyba to jak zjistit na
jakem portu je ta tiskarna....Nevite nahodou jak zjistit na jakem portu je dana
tiskarna?
****************************
David Go+AVk-ula, HCV group a.s.
Van+AQ0-urova 40,Nov+AP0- Ji+AQ0A7Q-n
www.nj.hcv.cz/maddave/
www.hcv.cz
Odpovedá: Josef Zvonicek
25. 7. 2004 20:02
>Nevite nahodou nekdo jak nebo cim posilat na tiskarnu ESC sequence? Alespon
na HP(pcl5) nap+AVk-.reset (27,69)....ESC a E.On mi to totiz vzdycky vezme
jako znaky.......
Pouzivam toto:
AssignFile(F,prn);
Rewrite(F);
if FNodeSetup.FPRNIni<>'' then write(F,FNodeSetup.FPrnIni); // Pokud je
inicializace jako je reset, nastaveni velikosti pisma atd #27 #69 .....
....
....
CloseFile(F);
ZVO
Odpovedá: Milos J. Hrach
26. 7. 2004 10:13
Jestli se nemilim tak zapisem na LPT.Uz jsem to dlouho nedelal,
ale myslim, ze je to nejak takle: Write(LPT,<kod ESC sekvence>)
> Nevite nahodou nekdo jak nebo cim posilat
> na tiskarnu ESC sequence? Alespon na
> HP(pcl5) nap+AVk-.reset (27,69)....ESC a
> E.On mi to totiz vzdycky vezme jako
> znaky.......
>
--
Milos J. Hrach, D6 profi, WinXP Home
Odpovedá: Vlastimil Zdenek
26. 7. 2004 12:05
Ahoj,
pouzivame toto bez problemu. Snad to pomuze:
KasaLPT : String;
KasaLPT := 'LPT1';
var
PrintFile : TextFile;
begin
if (KasaLPT<>'') and (KasaESC<>'')
then
begin
AssignFile(PrintFile,KasaLPT);
Rewrite(PrintFile);
Write(PrintFile,#27,#112,#0,#60,#120); //pro EPSON TM210 otevreni
kasy
CloseFile(PrintFile);
end;
end;
Vlasta
----- Original Message -----
From: "Milos J. Hrach" <delphi_konf@post.cz>
To: <delphi-l@clexpert.cz>
Sent: Monday, July 26, 2004 10:33 AM
Subject: Re: ESC sekvence
> Jestli se nemilim tak zapisem na LPT.Uz jsem to dlouho nedelal,
> ale myslim, ze je to nejak takle: Write(LPT,<kod ESC sekvence>)
>
> > Nevite nahodou nekdo jak nebo cim posilat
> > na tiskarnu ESC sequence? Alespon na
> > HP(pcl5) nap+AVk-.reset (27,69)....ESC a
> > E.On mi to totiz vzdycky vezme jako
> > znaky.......
> >
>
>
>
> --
> Milos J. Hrach, D6 profi, WinXP Home
>
>
>
Odpovedá: Lauko Stefan
28. 7. 2004 8:33
Ahoj,
http://delphi.icm.edu.pl/ftp/d20free/rawprint.zip - riesi tvoj problem.
Lauko.
----- Original Message -----
From: <david@nj.hcv.cz>
Sent: Wednesday, July 28, 2004 8:34 AM
> No to jde ale ja chci tisknout na usb ne na lpt nebo na sitovou to uz je
jedno....ale kdyz si tak s tim hraju tak se mi porad vyhyba to jak zjistit
na jakem portu je ta tiskarna....Nevite nahodou jak zjistit na jakem portu
je dana tiskarna?
Odpovedá: Fitz Ladislav
28. 7. 2004 7:58
> No to jde ale ja chci tisknout na usb ne na lpt nebo na sitovou to uz
> je jedno....ale kdyz si tak s tim hraju tak se mi porad vyhyba to jak
> zjistit na jakem portu je ta tiskarna....Nevite nahodou jak zjistit
> na jakem portu je dana tiskarna?
co se tyka posilani ESC sekvenci tak se podivej na API Escape
co se tyka zjistovani portu podivej se na www.volny.cz\maxi_fikus mam tam
unity k tiskarnam a tam nekde zjistuju i porty
Odpovedá: Josef Zvonicek
29. 7. 2004 7:22
Muzes taky pouzit command net use.
-----Original Message-----
From: delphi-l-owner@clexpert.cz [mailto:delphi-l-owner@clexpert.cz] On
Behalf Of david@nj.hcv.cz
Sent: Wednesday, July 28, 2004 8:34 AM
To: delphi-l@clexpert.cz
Subject: ESC sekvence
No to jde ale ja chci tisknout na usb ne na lpt nebo na sitovou to uz je
jedno....ale kdyz si tak s tim hraju tak se mi porad vyhyba to jak zjistit
na jakem portu je ta tiskarna....Nevite nahodou jak zjistit na jakem portu
je dana tiskarna?
****************************
David Go+AVk-ula, HCV group a.s.
Van+AQ0-urova 40,Nov+AP0- Ji+AQ0A7Q-n
www.nj.hcv.cz/maddave/
www.hcv.cz